home *** CD-ROM | disk | FTP | other *** search
/ Gekkan Dennou Club 145 / Gekkan Dennou Club - 2000.6 Vol. 145 (Japan).7z / Gekkan Dennou Club - 2000.6 Vol. 145 (Japan) (Track 1).bin / games / spassion / source.lzh / SOURCE / FuncEffect / TITSPARK.C < prev   
Text File  |  2000-03-16  |  554b  |  33 lines
  1. /* スパーク */
  2. #include <xsp2lib.h>
  3.  
  4. #include "../SPASSION.H"
  5. #include "../effect.h"
  6. #include "../priority.h"
  7.  
  8. static short MoveEffectTitSpark(EFFECT *);
  9.  
  10.  
  11. void InitEffectTitSpark(EFFECT * p)
  12. {
  13.     p->pt = obj_titspark;
  14.     if (p->type2 == 0)
  15.         p->info = 0x8300 | PRIORITY_ZAKO_EXPL;
  16.     else
  17.         p->info = 0x0300 | PRIORITY_ZAKO_EXPL;
  18.     p->seq = 0;
  19.     p->func_effect_move = MoveEffectTitSpark;
  20. }
  21.  
  22.  
  23. static short MoveEffectTitSpark(EFFECT * p)
  24. {
  25.     if(p->seq++ >= 12){
  26.         return (0);
  27.     }else{
  28.         xobj_set_st(p);
  29.         p->pt++;
  30.     }
  31.     return (1);
  32. }
  33.